; Disassembly of the file "z:\ramdisk\home\knoppix\none\TEST_HOMOK.bin" ; ; CPU Type: Z80 ; ; Created with dZ80 2.0 ; ; on Friday, 10 of May 2013 at 03:32 AM ; 0000 3E80 LD A,$80 0002 ED4F LD R,A 0004 31EEBF LD SP,$BFEE ; stack at BFEE 0007 2100C0 LD HL,$C000 000A 1101C0 LD DE,$C001 000D 01FF17 LD BC,$17FF 0010 3600 LD (HL),$00 0012 EDB0 LDIR ; blank serial video 0014 2100D8 LD HL,$D800 0017 1101D8 LD DE,$D801 001A 01FF02 LD BC,$02FF 001D 3607 LD (HL),$07 ; INK=white, PAPER=black, no BRIGHT, no BLINK 001F EDB0 LDIR ; blank attr video 0021 215807 LD HL,$0758 ; ---@@@0023:07->1F 0024 1100DA LD DE,$DA00 0027 012000 LD BC,$0020 002A EDB0 LDIR ; 32 bytes from 0758 to 1st line of last third of screen (attr video) 002C 215807 LD HL,$0758 ; ---@@@002E:07->1F 002F 1120DA LD DE,$DA20 0032 012000 LD BC,$0020 0035 EDB0 LDIR ; 32 bytes from 0758 to 2nd line of last third of screen (attr video) 0037 3E92 LD A,$92 ; control word for 8255: Mode Set flag=active, ; ; Group A: Select Mode 0, ; ; Port A set to Input mode, ; ; Port C (upper half) set to Output Mode, ; ; Group B: Select Mode 0, ; ; Port B set to Input Mode, ; ; Port C (lower half) set to Output Mode 0039 D3DF OUT ($DF),A ; write control word to 8255 003B 3E40 LD A,$40 003D D3FE OUT ($FE),A ; write 40 to port C of 8255 ; ; (set border to black, set "SO" to 0, set "O5" to 0, ; ; set "O6" to 1) 003F 21001A LD HL,$1A00 0042 22EFBF LD ($BFEF),HL ; 2 bytes right above stack 0045 210018 LD HL,$1800 0048 22FEBF LD ($BFFE),HL ; 2 bytes at BFFE-BFFF 004B 217807 LD HL,$0778 ; serial video data block 80d=50h bytes ---@@@004D:07->1F 004E 16C8 LD D,$C8 0050 0E08 LD C,$08 0052 1ECB LD E,$CB ; <--- <--- <--- <--- <---| start with DE=C8CB 0054 060A LD B,$0A ; | start with BC=0A08 0056 7E LD A,(HL) ; <-----| copy 10 bytes | 0057 12 LD (DE),A ; | | 0058 23 INC HL ; | from 778h to | 0059 1C INC E ; | | 005A 10FA DJNZ $0056 ; ----->| C8CB | 005C 14 INC D ; | 005D 0D DEC C ; | 005E 20F2 JR NZ,$0052 ; ---> ---> ---> ---> --->| repeat loop 8 times 0060 21AF06 LD HL,$06AF ; ---@@@0062:06->1E *** 0063 CD4002 CALL $0240 ; SEARCH FOR 0 ---@@@0065:02->1A 0066 0E00 LD C,$00 0068 CD9A00 CALL $009A ; <--- <--- <---| ---@@@006A:00->18 006B B7 OR A ; | 006C C28600 JP NZ,$0086 ; ---> --->| | ---@@@006E:00->18 006F 1640 LD D,$40 ; | | 0071 2E3F LD L,$3F ; | | 0073 CB11 RL C ; <-----| | | 0075 0608 LD B,$08 ; | | | 0077 26D0 LD H,$D0 ; | | | 0079 CB16 RL (HL) ; <--| | | | 007B 24 INC H ; | | | | 007C CB11 RL C ; | | | | 007E 10F9 DJNZ $0079 ; -->| | | | 0080 15 DEC D ; | | | 0081 28E5 JR Z,$0068 ; ---> ---> --->| 0083 2D DEC L ; | | | 0084 18ED JR $0073 ; ----->| | | 0086 FE31 CP $31 ; <--- <---| | 0088 CA4902 JP Z,$0249 ; BASIC | ---@@@008A:02->1A 008B FE32 CP $32 ; | 008D CA4F02 JP Z,$024F ; OPUS | ---@@@008F:02->1A 0090 FE33 CP $33 ; | 0092 CA7002 JP Z,$0270 ; | ---@@@0094:02->1A 0095 FE35 CP $35 ; | 0097 C8 RET Z ; wrong, there's| nowhere to return to ---###0097:C8->00 0098 18CE JR $0068 ; ---> ---> --->| ; ######################## 009A C5 PUSH BC 009B 01FE00 LD BC,$00FE 009E ED78 IN A,(C) 00A0 2F CPL 00A1 E63F AND $3F 00A3 2863 JR Z,$0108 00A5 D5 PUSH DE 00A6 E5 PUSH HL 00A7 110006 LD DE,$0600 00AA CDD601 CALL $01D6 ; ---@@@00AC:01->19 00AD 110000 LD DE,$0000 00B0 067F LD B,$7F 00B2 ED78 IN A,(C) 00B4 CB4F BIT 1,A 00B6 2009 JR NZ,$00C1 00B8 1602 LD D,$02 00BA 06FE LD B,$FE 00BC 210000 LD HL,$0000 00BF 1817 JR $00D8 00C1 210000 LD HL,$0000 00C4 06FE LD B,$FE 00C6 ED78 IN A,(C) 00C8 CB47 BIT 0,A 00CA 200E JR NZ,$00DA 00CC 210000 LD HL,$0000 00CF 2F CPL 00D0 E63E AND $3E 00D2 201C JR NZ,$00F0 00D4 06FD LD B,$FD 00D6 2E01 LD L,$01 00D8 ED78 IN A,(C) 00DA 2F CPL 00DB E63F AND $3F 00DD 2011 JR NZ,$00F0 00DF CB00 RLC B 00E1 2C INC L 00E2 CB78 BIT 7,B 00E4 20F2 JR NZ,$00D8 00E6 ED78 IN A,(C) 00E8 B2 OR D 00E9 2F CPL 00EA E63F AND $3F 00EC 2002 JR NZ,$00F0 00EE 1816 JR $0106 00F0 1F RRA 00F1 3803 JR C,$00F6 00F3 24 INC H 00F4 18FA JR $00F0 00F6 7C LD A,H 00F7 07 RLCA 00F8 07 RLCA 00F9 07 RLCA 00FA B5 OR L 00FB 6F LD L,A 00FC 2600 LD H,$00 00FE 01A704 LD BC,$04A7 ; ---@@@0100:04->1C 0101 09 ADD HL,BC 0102 7E LD A,(HL) 0103 CDBC01 CALL $01BC ; ---@@@0105:01->19 0106 E1 POP HL 0107 D1 POP DE 0108 C1 POP BC 0109 C9 RET ; ################### 010A F5 PUSH AF 010B C5 PUSH BC 010C D5 PUSH DE 010D E5 PUSH HL 010E FE20 CP $20 0110 DA4501 JP C,$0145 ; ---@@@0112:01->19 0113 DE20 SBC A,$20 0115 4F LD C,A 0116 0600 LD B,$00 0118 CB21 SLA C 011A CB10 RL B 011C CB21 SLA C 011E CB10 RL B 0120 CB21 SLA C 0122 CB10 RL B ; multiply BC by 8 (index of 8-line char stored in table) 0124 21D704 LD HL,$04D7 ; base addr of char table ---@@@0126:04->1C 0127 09 ADD HL,BC ; point to char in table 0128 ED5BEFBF LD DE,($BFEF) ; initially loaded with 1A00 (line 0042) 012C CB22 SLA D 012E CB22 SLA D 0130 CB22 SLA D ; multiply by 8 0132 0608 LD B,$08 0134 7E LD A,(HL) ; <--- <--- <---| 0135 12 LD (DE),A ; | 0136 14 INC D ; | 0137 23 INC HL ; | 0138 10FA DJNZ $0134 ; ---> ---> --->| 013A 15 DEC D 013B CB3A SRL D 013D CB3A SRL D 013F CB3A SRL D 0141 13 INC DE 0142 C35C01 JP $015C ; ---> ---> --->| ---@@@0144:01->19 0145 ED5BEFBF LD DE,($BFEF) ; initially loaded with 1A00 (line 0042) 0149 FE0D CP $0D ; | 014B 2802 JR Z,$014F ; | 014D 1864 JR $01B3 ; | 014F 3EE0 LD A,$E0 ; | 0151 A3 AND E ; | 0152 5F LD E,A ; | 0153 012000 LD BC,$0020 ; | 0156 EB EX DE,HL ; | 0157 ED4A ADC HL,BC ; | 0159 EB EX DE,HL ; | 015A 1800 JR $015C ; | 015C 7A LD A,D ; <--- <--- <---| 015D E60F AND $0F 015F FE0B CP $0B 0161 2050 JR NZ,$01B3 0163 ED5BFEBF LD DE,($BFFE) ; initially loaded with 1800 (line 0048) 0167 212000 LD HL,$0020 016A 19 ADD HL,DE 016B E5 PUSH HL 016C D5 PUSH DE 016D CB22 SLA D 016F CB22 SLA D 0171 CB22 SLA D 0173 CB24 SLA H 0175 CB24 SLA H 0177 CB24 SLA H 0179 0608 LD B,$08 017B 7E LD A,(HL) 017C 12 LD (DE),A 017D 24 INC H 017E 14 INC D 017F 10FA DJNZ $017B 0181 D1 POP DE 0182 E1 POP HL 0183 13 INC DE 0184 23 INC HL 0185 7C LD A,H 0186 E60F AND $0F 0188 FE0B CP $0B 018A 20DF JR NZ,$016B 018C ED4BFEBF LD BC,($BFFE) ; initially loaded with 1800 (line 0048) 0190 CB60 BIT 4,B 0192 2808 JR Z,$019C 0194 21E0D0 LD HL,$D0E0 0197 11E01A LD DE,$1AE0 019A 1806 JR $01A2 019C 21E050 LD HL,$50E0 019F 11E00A LD DE,$0AE0 01A2 0E20 LD C,$20 01A4 0608 LD B,$08 ; <--- <--- <--- <--- <--- <---| 01A6 3600 LD (HL),$00 ; <--- <--- <---| | 01A8 24 INC H ; | | 01A9 10FB DJNZ $01A6 ; ---> ---> --->| | 01AB 7C LD A,H ; | 01AC E6D0 AND $D0 ; | 01AE 67 LD H,A ; | 01AF 2C INC L ; | 01B0 0D DEC C ; | 01B1 20F1 JR NZ,$01A4 ; ---> ---> ---> ---> ---> --->| 01B3 ED53EFBF LD ($BFEF),DE 01B7 E1 POP HL 01B8 D1 POP DE 01B9 C1 POP BC 01BA F1 POP AF 01BB C9 RET ; ################# 01BC 117001 LD DE,$0170 01BF F3 DI 01C0 F5 PUSH AF 01C1 C5 PUSH BC 01C2 3E00 LD A,$00 01C4 CBE7 SET 4,A 01C6 D3FE OUT ($FE),A 01C8 CDD601 CALL $01D6 ; ---@@@01CA:01->19 01CB D3FE OUT ($FE),A 01CD CDD601 CALL $01D6 ; ---@@@01CF:01->19 01D0 1D DEC E 01D1 20F1 JR NZ,$01C4 01D3 C1 POP BC 01D4 F1 POP AF 01D5 C9 RET ; ################# 01D6 D5 PUSH DE 01D7 3E00 LD A,$00 01D9 1B DEC DE 01DA BA CP D 01DB 38FC JR C,$01D9 01DD D1 POP DE 01DE C9 RET ; ################# 01DF FE10 CP $10 01E1 D0 RET NC 01E2 FE0A CP $0A 01E4 3003 JR NC,$01E9 01E6 C630 ADD A,$30 01E8 C9 RET 01E9 C637 ADD A,$37 01EB C9 RET ; ################# 01EC 7C LD A,H 01ED CB3F SRL A 01EF CB3F SRL A 01F1 CB3F SRL A 01F3 CB3F SRL A 01F5 CDDF01 CALL $01DF ; ---@@@01F7:01->19 01F8 CD0A01 CALL $010A ; ---@@@01FA:01->19 01FB 7C LD A,H 01FC E60F AND $0F 01FE CDDF01 CALL $01DF ; ---@@@0200:01->19 0201 CD0A01 CALL $010A ; ---@@@0203:01->19 0204 7D LD A,L 0205 CB3F SRL A 0207 CB3F SRL A 0209 CB3F SRL A 020B CB3F SRL A 020D CDDF01 CALL $01DF ; ---@@@020F:01->19 0210 CD0A01 CALL $010A ; ---@@@0212:01->19 0213 7D LD A,L 0214 E60F AND $0F 0216 CDDF01 CALL $01DF ; ---@@@0218:01->19 0219 CD0A01 CALL $010A ; ---@@@021B:01->19 021C 3E20 LD A,$20 021E CD0A01 CALL $010A ; ---@@@0220:01->19 0221 C9 RET ; ############## 0222 F5 PUSH AF 0223 CB3F SRL A 0225 CB3F SRL A 0227 CB3F SRL A 0229 CB3F SRL A 022B CDDF01 CALL $01DF ; ---@@@022D:01->19 022E CD0A01 CALL $010A ; ---@@@0230:01->19 0231 F1 POP AF 0232 E60F AND $0F 0234 CDDF01 CALL $01DF ; ---@@@0236:01->19 0237 CD0A01 CALL $010A ; ---@@@0239:01->19 023A 3E20 LD A,$20 023C CD0A01 CALL $010A ; ---@@@023E:01->19 023F C9 RET ; ####### SEARCH FOR 0 ####### 0240 7E LD A,(HL) 0241 B7 OR A 0242 C8 RET Z 0243 CD0A01 CALL $010A ; ---@@@0245:01->19 0246 23 INC HL 0247 18F7 JR $0240 ; ############## 0249 3E00 LD A,$00 024B D3FE OUT ($FE),A ; TO=LS=O5=O6=SO=0 024D 1804 JR $0253 024F 3EBF LD A,$BF ; ####### 0251 D3FE OUT ($FE),A ; TO=1, LS=1, O5=1, O6=0, SO=1 0253 210040 LD HL,$4000 0256 110080 LD DE,$8000 0259 010020 LD BC,$2000 025C EDB0 LDIR 025E 210060 LD HL,$6000 0261 1100E0 LD DE,$E000 0264 010020 LD BC,$2000 0267 EDB0 LDIR 0269 210000 LD HL,$0000 026C AF XOR A 026D ED4F LD R,A ; change hardware config to BASIC 026F E9 JP (HL) 0270 21F006 LD HL,$06F0 ; ####### HARDWARE TESTS ####### ---@@@0272:06->1E **** 0273 CD4002 CALL $0240 ; SEARCH FOR 0 ---@@@0275:02->1A 0276 3E0D LD A,$0D 0278 CD0A01 CALL $010A ; ---@@@027A:01->19 027B CD9A00 CALL $009A ; ---@@@027D:00->18 027E B7 OR A 027F 28FA JR Z,$027B 0281 CD0A01 CALL $010A ; ---@@@0283:01->19 0284 FE56 CP $56 0286 CCA902 CALL Z,$02A9 ; ---@@@0288:02->1A 0289 FE43 CP $43 028B CCBD02 CALL Z,$02BD ; ---@@@028D:02->1A 028E FE58 CP $58 0290 CCD102 CALL Z,$02D1 ; ---@@@0292:02->1A 0293 FE5A CP $5A 0295 CCE903 CALL Z,$03E9 ; ---@@@0297:03->1B 0298 FE34 CP $34 029A CA3B04 JP Z,$043B ; ---@@@029C:04->1C 029D FE51 CP $51 029F CA3F00 JP Z,$003F ; ---@@@02A1:00->18 02A2 3E0D LD A,$0D 02A4 CD0A01 CALL $010A ; ---@@@02A6:01->19 02A7 18C7 JR $0270 02A9 01FF17 LD BC,$17FF 02AC ED43F4BF LD ($BFF4),BC 02B0 2100C0 LD HL,$C000 02B3 22F2BF LD ($BFF2),HL 02B6 CDC403 CALL $03C4 ; ---@@@02B8:03->1B 02B9 CD2103 CALL $0321 ; ---@@@02BB:03->1B 02BC C9 RET ; ############## 02BD 01C03F LD BC,$3FC0 02C0 ED43F4BF LD ($BFF4),BC 02C4 210080 LD HL,$8000 02C7 22F2BF LD ($BFF2),HL 02CA CDC403 CALL $03C4 ; ---@@@02CC:03->1B 02CD CD2103 CALL $0321 ; ---@@@02CF:03->1B 02D0 C9 RET ; ############## 02D1 01FF1F LD BC,$1FFF 02D4 ED43F4BF LD ($BFF4),BC 02D8 2100E0 LD HL,$E000 02DB 22F2BF LD ($BFF2),HL 02DE CDC403 CALL $03C4 ; ---@@@02E0:03->1B 02E1 CD2103 CALL $0321 ; ---@@@02E3:03->1B 02E4 C9 RET ; ############## 02E5 01FF17 LD BC,$17FF 02E8 ED43F4BF LD ($BFF4),BC 02EC 210040 LD HL,$4000 02EF 22F2BF LD ($BFF2),HL 02F2 CDC403 CALL $03C4 ; ---@@@02F4:03->1B 02F5 CD2103 CALL $0321 ; ---@@@02F7:03->1B 02F8 C9 RET ; ############## 02F9 01FF24 LD BC,$24FF 02FC ED43F4BF LD ($BFF4),BC 0300 21005B LD HL,$5B00 0303 22F2BF LD ($BFF2),HL 0306 CDC403 CALL $03C4 ; ---@@@0308:03->1B 0309 CD2103 CALL $0321 ; ---@@@030B:03->1B 030C C9 RET ; ############## 030D 01FF3F LD BC,$3FFF 0310 ED43F4BF LD ($BFF4),BC 0314 2100C0 LD HL,$C000 0317 22F2BF LD ($BFF2),HL 031A CDC403 CALL $03C4 ; ---@@@031C:03->1B 031D CD2103 CALL $0321 ; ---@@@031F:03->1B 0320 C9 RET ; ############## 0321 3EFF LD A,$FF 0323 32F1BF LD ($BFF1),A 0326 CD7503 CALL $0375 ; ---@@@0328:03->1B 0329 3E00 LD A,$00 032B 32F1BF LD ($BFF1),A 032E CD7503 CALL $0375 ; ---@@@0330:03->1B 0331 3E0D LD A,$0D 0333 CD0A01 CALL $010A ; ---@@@0335:01->19 0336 210F07 LD HL,$070F ; ---@@@0338:07->1F **** 0339 CD4002 CALL $0240 ; ---@@@033B:02->1A 033C 3E0D LD A,$0D 033E 213007 LD HL,$0730 ; ---@@@0340:07->1F **** 0341 CD4002 CALL $0240 ; ---@@@0343:02->1A 0344 DD7E00 LD A,(IX+$00) 0347 CD2202 CALL $0222 ; ---@@@0349:02->1A 034A DD7E01 LD A,(IX+$01) 034D CD2202 CALL $0222 ; ---@@@034F:02->1A 0350 DD7E02 LD A,(IX+$02) 0353 CD2202 CALL $0222 ; ---@@@0355:02->1A 0356 DD7E03 LD A,(IX+$03) 0359 CD2202 CALL $0222 ; ---@@@035B:02->1A 035C DD7E04 LD A,(IX+$04) 035F CD2202 CALL $0222 ; ---@@@0361:02->1A 0362 DD7E05 LD A,(IX+$05) 0365 CD2202 CALL $0222 ; ---@@@0367:02->1A 0368 DD7E06 LD A,(IX+$06) 036B CD2202 CALL $0222 ; ---@@@036D:02->1A 036E DD7E07 LD A,(IX+$07) 0371 CD2202 CALL $0222 ; ---@@@0373:02->1A 0374 C9 RET ; ############## 0375 ED4BF4BF LD BC,($BFF4) 0379 2AF2BF LD HL,($BFF2) 037C 3AF1BF LD A,($BFF1) 037F 77 LD (HL),A 0380 AE XOR (HL) 0381 2007 JR NZ,$038A 0383 23 INC HL 0384 0B DEC BC 0385 78 LD A,B 0386 B1 OR C 0387 20F3 JR NZ,$037C 0389 C9 RET 038A CB47 BIT 0,A 038C 2803 JR Z,$0391 038E DD3400 INC (IX+$00) 0391 CB4F BIT 1,A 0393 2803 JR Z,$0398 0395 DD3401 INC (IX+$01) 0398 CB57 BIT 2,A 039A 2803 JR Z,$039F 039C DD3402 INC (IX+$02) 039F CB5F BIT 3,A 03A1 2803 JR Z,$03A6 03A3 DD3403 INC (IX+$03) 03A6 CB67 BIT 4,A 03A8 2803 JR Z,$03AD 03AA DD3404 INC (IX+$04) 03AD CB6F BIT 5,A 03AF 2803 JR Z,$03B4 03B1 DD3405 INC (IX+$05) 03B4 CB77 BIT 6,A 03B6 2803 JR Z,$03BB 03B8 DD3406 INC (IX+$06) 03BB CB7F BIT 7,A 03BD 28C4 JR Z,$0383 03BF DD3407 INC (IX+$07) 03C2 18BF JR $0383 03C4 DD21F6BF LD IX,$BFF6 03C8 DD360000 LD (IX+$00),$00 03CC DD360100 LD (IX+$01),$00 03D0 DD360200 LD (IX+$02),$00 03D4 DD360300 LD (IX+$03),$00 03D8 DD360400 LD (IX+$04),$00 03DC DD360500 LD (IX+$05),$00 03E0 DD360600 LD (IX+$06),$00 03E4 DD360700 LD (IX+$07),$00 03E8 C9 RET ; ############## 03E9 3EFF LD A,$FF 03EB D3FE OUT ($FE),A 03ED 3E0D LD A,$0D 03EF CD0A01 CALL $010A ; ---@@@03F1:01->19 03F2 CD0204 CALL $0402 ; ---@@@03F4:04->1C 03F5 3E00 LD A,$00 03F7 D3FE OUT ($FE),A 03F9 3E0D LD A,$0D 03FB CD0A01 CALL $010A ; ---@@@03FD:01->19 03FE CD0204 CALL $0402 ; ---@@@0400:04->1C 0401 C9 RET ; ############## 0402 210000 LD HL,$0000 0405 CD1904 CALL $0419 ; ---@@@0407:04->1C 0408 210040 LD HL,$4000 040B E5 PUSH HL 040C CD1904 CALL $0419 ; ---@@@040E:04->1C 040F E1 POP HL 0410 010008 LD BC,$0800 0413 09 ADD HL,BC 0414 CB7C BIT 7,H 0416 28F3 JR Z,$040B 0418 C9 RET ; ############## 0419 010008 LD BC,$0800 041C DD210000 LD IX,$0000 0420 1600 LD D,$00 0422 5E LD E,(HL) 0423 DD19 ADD IX,DE 0425 23 INC HL 0426 0B DEC BC 0427 78 LD A,B 0428 B1 OR C 0429 20F7 JR NZ,$0422 042B DD22F6BF LD ($BFF6),IX 042F 2AF6BF LD HL,($BFF6) 0432 CDEC01 CALL $01EC ; ---@@@0434:01->19 0435 3E0D LD A,$0D 0437 CD0A01 CALL $010A ; ---@@@0439:01->19 043A C9 RET ; ############## 043B 210000 LD HL,$0000 ; copy first 8KB of memory ---@@@043D:00->18 043E 110080 LD DE,$8000 ; with this ROM code 0441 01FF1F LD BC,$1FFF ; to 8000 (0000 in BASIC) ---@@@0442:FF1F->0008 0444 EDB0 LDIR 0446 3E00 LD A,$00 0448 D3FE OUT ($FE),A 044A 215104 LD HL,$0451 ; set jump point to next code block ---@@@044C:04->1C 044D AF XOR A 044E ED4F LD R,A ; change config to BASIC 0450 E9 JP (HL) ; and run it from there ; ############## 0451 F3 DI 0452 31EEBF LD SP,$BFEE 0455 210040 LD HL,$4000 0458 110140 LD DE,$4001 045B 01FF17 LD BC,$17FF 045E 3600 LD (HL),$00 0460 EDB0 LDIR 0462 210058 LD HL,$5800 0465 110158 LD DE,$5801 0468 01FF02 LD BC,$02FF 046B 360E LD (HL),$0E 046D EDB0 LDIR 046F 210008 LD HL,$0800 0472 22EFBF LD ($BFEF),HL 0475 22FEBF LD ($BFFE),HL 0478 213A07 LD HL,$073A ; <--- <--- <---| ---@@@047A:07->1F 047B CD4002 CALL $0240 ; | ---@@@047D:02->1A 047E 3E0D LD A,$0D ; | 0480 CD0A01 CALL $010A ; | ---@@@0482:01->19 0483 CD9A00 CALL $009A ; | ---@@@0485:00->18 0486 B7 OR A ; | 0487 28FA JR Z,$0483 ; | 0489 CD0A01 CALL $010A ; | ---@@@048B:01->19 048C FE56 CP $56 ; | 048E CCE502 CALL Z,$02E5 ; | ---@@@0490:02->1A 0491 FE42 CP $42 ; | 0493 CCF902 CALL Z,$02F9 ; | ---@@@0495:02->1A 0496 FE4E CP $4E ; | 0498 CCBD02 CALL Z,$02BD ; | ---@@@049A:02->1A 049B FE4D CP $4D ; | 049D CC0D03 CALL Z,$030D ; | ---@@@049F:03->1B 04A0 3E0D LD A,$0D ; | 04A2 CD0A01 CALL $010A ; | ---@@@04A4:01->19 04A5 18D1 JR $0478 ; ---> ---> --->| ; ########### DATA ########### 04A7 00 DB $00 04A8 41 DB $41 04A9 51 DB $51 04AA 31 DB $31 04AB 30 DB $30 04AC 50 DB $50 04AD 0D DB $0D 04AE 18 DB $18 04AF 5A DB $5A 04B0 53 DB $53 04B1 57 DB $57 04B2 32 DB $32 04B3 39 DB $39 04B4 4F DB $4F 04B5 4C DB $4C 04B6 00 DB $00 04B7 58 DB $58 04B8 44 DB $44 04B9 45 DB $45 04BA 33 DB $33 04BB 38 DB $38 04BC 49 DB $49 04BD 4B DB $4B 04BE 4D DB $4D 04BF 43 DB $43 04C0 46 DB $46 04C1 52 DB $52 04C2 34 DB $34 04C3 37 DB $37 04C4 55 DB $55 04C5 4A DB $4A 04C6 4E DB $4E 04C7 56 DB $56 04C8 47 DB $47 04C9 54 DB $54 04CA 35 DB $35 04CB 36 DB $36 04CC 59 DB $59 04CD 48 DB $48 04CE 42 DB $42 04CF 00 DB $00 04D0 20 DB $20 04D1 0A DB $0A 04D2 1B DB $1B 04D3 11 DB $11 04D4 12 DB $12 04D5 13 DB $13 04D6 14 DB $14 04D7 00 DB $00 04D8 00 DB $00 04D9 00 DB $00 04DA 00 DB $00 04DB 00 DB $00 04DC 00 DB $00 04DD 00 DB $00 04DE 00 DB $00 04DF 00 DB $00 04E0 10 DB $10 04E1 10 DB $10 04E2 10 DB $10 04E3 10 DB $10 04E4 10 DB $10 04E5 00 DB $00 04E6 10 DB $10 04E7 00 DB $00 04E8 1E DB $1E 04E9 14 DB $14 04EA 28 DB $28 04EB 00 DB $00 04EC 00 DB $00 04ED 00 DB $00 04EE 00 DB $00 04EF 00 DB $00 04F0 00 DB $00 04F1 28 DB $28 04F2 7C DB $7C 04F3 28 DB $28 04F4 28 DB $28 04F5 7C DB $7C 04F6 28 DB $28 04F7 10 DB $10 04F8 3C DB $3C 04F9 54 DB $54 04FA 38 DB $38 04FB 14 DB $14 04FC 52 DB $52 04FD 7C DB $7C 04FE 10 DB $10 04FF 00 DB $00 0500 C2 DB $C2 0501 C4 DB $C4 0502 08 DB $08 0503 10 DB $10 0504 20 DB $20 0505 46 DB $46 0506 86 DB $86 0507 00 DB $00 0508 38 DB $38 0509 28 DB $28 050A 10 DB $10 050B 30 DB $30 050C 4A DB $4A 050D 44 DB $44 050E 3A DB $3A 050F 00 DB $00 0510 06 DB $06 0511 06 DB $06 0512 02 DB $02 0513 04 DB $04 0514 00 DB $00 0515 00 DB $00 0516 00 DB $00 0517 00 DB $00 0518 04 DB $04 0519 08 DB $08 051A 10 DB $10 051B 10 DB $10 051C 10 DB $10 051D 08 DB $08 051E 04 DB $04 051F 00 DB $00 0520 40 DB $40 0521 20 DB $20 0522 10 DB $10 0523 10 DB $10 0524 10 DB $10 0525 20 DB $20 0526 40 DB $40 0527 00 DB $00 0528 00 DB $00 0529 28 DB $28 052A 10 DB $10 052B 7C DB $7C 052C 10 DB $10 052D 28 DB $28 052E 00 DB $00 052F 00 DB $00 0530 00 DB $00 0531 10 DB $10 0532 10 DB $10 0533 7C DB $7C 0534 10 DB $10 0535 10 DB $10 0536 00 DB $00 0537 00 DB $00 0538 00 DB $00 0539 00 DB $00 053A 00 DB $00 053B C0 DB $C0 053C C0 DB $C0 053D 40 DB $40 053E 80 DB $80 053F 00 DB $00 0540 00 DB $00 0541 00 DB $00 0542 00 DB $00 0543 7C DB $7C 0544 00 DB $00 0545 00 DB $00 0546 00 DB $00 0547 00 DB $00 0548 00 DB $00 0549 00 DB $00 054A 00 DB $00 054B 00 DB $00 054C C0 DB $C0 054D C0 DB $C0 054E 00 DB $00 054F 00 DB $00 0550 02 DB $02 0551 04 DB $04 0552 08 DB $08 0553 10 DB $10 0554 20 DB $20 0555 40 DB $40 0556 80 DB $80 0557 00 DB $00 0558 38 DB $38 0559 44 DB $44 055A 4C DB $4C 055B 54 DB $54 055C 64 DB $64 055D 44 DB $44 055E 38 DB $38 055F 00 DB $00 0560 10 DB $10 0561 30 DB $30 0562 10 DB $10 0563 10 DB $10 0564 10 DB $10 0565 10 DB $10 0566 38 DB $38 0567 00 DB $00 0568 38 DB $38 0569 44 DB $44 056A 04 DB $04 056B 18 DB $18 056C 20 DB $20 056D 40 DB $40 056E 7C DB $7C 056F 00 DB $00 0570 3C DB $3C 0571 08 DB $08 0572 1C DB $1C 0573 02 DB $02 0574 02 DB $02 0575 04 DB $04 0576 78 DB $78 0577 00 DB $00 0578 08 DB $08 0579 10 DB $10 057A 20 DB $20 057B 48 DB $48 057C 7C DB $7C 057D 08 DB $08 057E 08 DB $08 057F 00 DB $00 0580 7C DB $7C 0581 80 DB $80 0582 78 DB $78 0583 04 DB $04 0584 04 DB $04 0585 04 DB $04 0586 78 DB $78 0587 00 DB $00 0588 18 DB $18 0589 20 DB $20 058A 40 DB $40 058B 78 DB $78 058C 44 DB $44 058D 44 DB $44 058E 38 DB $38 058F 00 DB $00 0590 7C DB $7C 0591 44 DB $44 0592 08 DB $08 0593 10 DB $10 0594 20 DB $20 0595 20 DB $20 0596 20 DB $20 0597 00 DB $00 0598 18 DB $18 0599 24 DB $24 059A 18 DB $18 059B 24 DB $24 059C 42 DB $42 059D 42 DB $42 059E 3C DB $3C 059F 00 DB $00 05A0 38 DB $38 05A1 44 DB $44 05A2 44 DB $44 05A3 3C DB $3C 05A4 04 DB $04 05A5 08 DB $08 05A6 30 DB $30 05A7 00 DB $00 05A8 00 DB $00 05A9 18 DB $18 05AA 18 DB $18 05AB 00 DB $00 05AC 18 DB $18 05AD 18 DB $18 05AE 00 DB $00 05AF 00 DB $00 05B0 00 DB $00 05B1 18 DB $18 05B2 18 DB $18 05B3 00 DB $00 05B4 18 DB $18 05B5 18 DB $18 05B6 20 DB $20 05B7 00 DB $00 05B8 00 DB $00 05B9 08 DB $08 05BA 10 DB $10 05BB 20 DB $20 05BC 10 DB $10 05BD 08 DB $08 05BE 00 DB $00 05BF 00 DB $00 05C0 00 DB $00 05C1 00 DB $00 05C2 7C DB $7C 05C3 00 DB $00 05C4 7C DB $7C 05C5 00 DB $00 05C6 00 DB $00 05C7 00 DB $00 05C8 00 DB $00 05C9 20 DB $20 05CA 10 DB $10 05CB 08 DB $08 05CC 10 DB $10 05CD 20 DB $20 05CE 00 DB $00 05CF 00 DB $00 05D0 38 DB $38 05D1 44 DB $44 05D2 04 DB $04 05D3 08 DB $08 05D4 10 DB $10 05D5 00 DB $00 05D6 10 DB $10 05D7 00 DB $00 05D8 38 DB $38 05D9 44 DB $44 05DA 94 DB $94 05DB A4 DB $A4 05DC 98 DB $98 05DD 42 DB $42 05DE 3C DB $3C 05DF 00 DB $00 05E0 10 DB $10 05E1 28 DB $28 05E2 44 DB $44 05E3 FE DB $FE 05E4 82 DB $82 05E5 82 DB $82 05E6 82 DB $82 05E7 00 DB $00 05E8 F8 DB $F8 05E9 84 DB $84 05EA FC DB $FC 05EB 82 DB $82 05EC 82 DB $82 05ED 82 DB $82 05EE FC DB $FC 05EF 00 DB $00 05F0 7C DB $7C 05F1 82 DB $82 05F2 80 DB $80 05F3 80 DB $80 05F4 80 DB $80 05F5 82 DB $82 05F6 7C DB $7C 05F7 00 DB $00 05F8 F8 DB $F8 05F9 84 DB $84 05FA 82 DB $82 05FB 82 DB $82 05FC 82 DB $82 05FD 84 DB $84 05FE F8 DB $F8 05FF 00 DB $00 0600 FE DB $FE 0601 80 DB $80 0602 80 DB $80 0603 F8 DB $F8 0604 80 DB $80 0605 80 DB $80 0606 FE DB $FE 0607 00 DB $00 0608 FE DB $FE 0609 80 DB $80 060A 80 DB $80 060B F8 DB $F8 060C 80 DB $80 060D 80 DB $80 060E 80 DB $80 060F 00 DB $00 0610 7C DB $7C 0611 82 DB $82 0612 80 DB $80 0613 9C DB $9C 0614 82 DB $82 0615 82 DB $82 0616 7C DB $7C 0617 00 DB $00 0618 82 DB $82 0619 82 DB $82 061A 82 DB $82 061B FE DB $FE 061C 82 DB $82 061D 82 DB $82 061E 82 DB $82 061F 00 DB $00 0620 38 DB $38 0621 10 DB $10 0622 10 DB $10 0623 10 DB $10 0624 10 DB $10 0625 10 DB $10 0626 38 DB $38 0627 00 DB $00 0628 1C DB $1C 0629 08 DB $08 062A 08 DB $08 062B 08 DB $08 062C 88 DB $88 062D 88 DB $88 062E 70 DB $70 062F 00 DB $00 0630 84 DB $84 0631 88 DB $88 0632 90 DB $90 0633 F0 DB $F0 0634 88 DB $88 0635 84 DB $84 0636 82 DB $82 0637 00 DB $00 0638 80 DB $80 0639 80 DB $80 063A 80 DB $80 063B 80 DB $80 063C 80 DB $80 063D 80 DB $80 063E FC DB $FC 063F 00 DB $00 0640 C6 DB $C6 0641 AA DB $AA 0642 92 DB $92 0643 82 DB $82 0644 82 DB $82 0645 82 DB $82 0646 82 DB $82 0647 00 DB $00 0648 82 DB $82 0649 C2 DB $C2 064A A2 DB $A2 064B 92 DB $92 064C 8A DB $8A 064D 86 DB $86 064E 82 DB $82 064F 00 DB $00 0650 7C DB $7C 0651 82 DB $82 0652 82 DB $82 0653 82 DB $82 0654 82 DB $82 0655 82 DB $82 0656 7C DB $7C 0657 00 DB $00 0658 FC DB $FC 0659 82 DB $82 065A 82 DB $82 065B 82 DB $82 065C FC DB $FC 065D 80 DB $80 065E 80 DB $80 065F 00 DB $00 0660 78 DB $78 0661 84 DB $84 0662 84 DB $84 0663 84 DB $84 0664 8C DB $8C 0665 84 DB $84 0666 7A DB $7A 0667 00 DB $00 0668 FC DB $FC 0669 82 DB $82 066A 82 DB $82 066B 82 DB $82 066C FC DB $FC 066D 84 DB $84 066E 82 DB $82 066F 00 DB $00 0670 38 DB $38 0671 44 DB $44 0672 40 DB $40 0673 3C DB $3C 0674 02 DB $02 0675 82 DB $82 0676 7C DB $7C 0677 00 DB $00 0678 FE DB $FE 0679 10 DB $10 067A 10 DB $10 067B 10 DB $10 067C 10 DB $10 067D 10 DB $10 067E 10 DB $10 067F 00 DB $00 0680 82 DB $82 0681 82 DB $82 0682 82 DB $82 0683 82 DB $82 0684 82 DB $82 0685 82 DB $82 0686 7C DB $7C 0687 00 DB $00 0688 82 DB $82 0689 82 DB $82 068A 82 DB $82 068B 82 DB $82 068C 44 DB $44 068D 28 DB $28 068E 10 DB $10 068F 00 DB $00 0690 82 DB $82 0691 82 DB $82 0692 82 DB $82 0693 92 DB $92 0694 AA DB $AA 0695 C6 DB $C6 0696 82 DB $82 0697 00 DB $00 0698 82 DB $82 0699 44 DB $44 069A 28 DB $28 069B 10 DB $10 069C 28 DB $28 069D 44 DB $44 069E 82 DB $82 069F 00 DB $00 06A0 82 DB $82 06A1 44 DB $44 06A2 28 DB $28 06A3 10 DB $10 06A4 10 DB $10 06A5 10 DB $10 06A6 10 DB $10 06A7 00 DB $00 06A8 FE DB $FE 06A9 04 DB $04 06AA 08 DB $08 06AB 10 DB $10 06AC 20 DB $20 06AD 40 DB $40 06AE FE DB $FE 06AF 20 DB $20 06B0 20 DB $20 06B1 31 DB $31 06B2 3D DB $3D 06B3 42 DB $42 06B4 41 DB $41 06B5 53 DB $53 06B6 49 DB $49 06B7 43 DB $43 06B8 20 DB $20 06B9 20 DB $20 06BA 32 DB $32 06BB 3D DB $3D 06BC 4F DB $4F 06BD 50 DB $50 06BE 55 DB $55 06BF 53 DB $53 06C0 20 DB $20 06C1 20 DB $20 06C2 33 DB $33 06C3 3D DB $3D 06C4 54 DB $54 06C5 45 DB $45 06C6 53 DB $53 06C7 54 DB $54 06C8 20 DB $20 06C9 20 DB $20 06CA 43 DB $43 06CB 4F DB $4F 06CC 42 DB $42 06CD 52 DB $52 06CE 41 DB $41 06CF 20 DB $20 06D0 53 DB $53 06D1 4F DB $4F 06D2 46 DB $46 06D3 54 DB $54 06D4 20 DB $20 06D5 41 DB $41 06D6 4E DB $4E 06D7 44 DB $44 06D8 20 DB $20 06D9 48 DB $48 06DA 41 DB $41 06DB 52 DB $52 06DC 44 DB $44 06DD 20 DB $20 06DE 42 DB $42 06DF 59 DB $59 06E0 20 DB $20 06E1 4C DB $4C 06E2 45 DB $45 06E3 53 DB $53 06E4 4F DB $4F 06E5 56 DB $56 06E6 49 DB $49 06E7 43 DB $43 06E8 49 DB $49 06E9 20 DB $20 06EA 48 DB $48 06EB 4F DB $4F 06EC 4D DB $4D 06ED 4F DB $4F 06EE 4B DB $4B 06EF 00 DB $00 06F0 56 DB $56 06F1 3D DB $3D 06F2 56 DB $56 06F3 49 DB $49 06F4 44 DB $44 06F5 45 DB $45 06F6 4F DB $4F 06F7 20 DB $20 06F8 43 DB $43 06F9 3D DB $3D 06FA 52 DB $52 06FB 41 DB $41 06FC 4D DB $4D 06FD 30 DB $30 06FE 41 DB $41 06FF 20 DB $20 0700 58 DB $58 0701 3D DB $3D 0702 52 DB $52 0703 41 DB $41 0704 4D DB $4D 0705 30 DB $30 0706 42 DB $42 0707 20 DB $20 0708 5A DB $5A 0709 3D DB $3D 070A 53 DB $53 070B 55 DB $55 070C 4D DB $4D 070D 45 DB $45 070E 00 DB $00 070F 42 DB $42 0710 49 DB $49 0711 54 DB $54 0712 20 DB $20 0713 4E DB $4E 0714 52 DB $52 0715 2E DB $2E 0716 20 DB $20 0717 20 DB $20 0718 30 DB $30 0719 20 DB $20 071A 20 DB $20 071B 31 DB $31 071C 20 DB $20 071D 20 DB $20 071E 32 DB $32 071F 20 DB $20 0720 20 DB $20 0721 33 DB $33 0722 20 DB $20 0723 20 DB $20 0724 34 DB $34 0725 20 DB $20 0726 20 DB $20 0727 35 DB $35 0728 20 DB $20 0729 20 DB $20 072A 36 DB $36 072B 20 DB $20 072C 20 DB $20 072D 37 DB $37 072E 20 DB $20 072F 00 DB $00 0730 4E DB $4E 0731 52 DB $52 0732 2E DB $2E 0733 45 DB $45 0734 52 DB $52 0735 52 DB $52 0736 4F DB $4F 0737 52 DB $52 0738 20 DB $20 0739 00 DB $00 073A 56 DB $56 073B 3D DB $3D 073C 56 DB $56 073D 49 DB $49 073E 44 DB $44 073F 45 DB $45 0740 4F DB $4F 0741 20 DB $20 0742 42 DB $42 0743 3D DB $3D 0744 52 DB $52 0745 41 DB $41 0746 4D DB $4D 0747 56 DB $56 0748 31 DB $31 0749 20 DB $20 074A 4E DB $4E 074B 3D DB $3D 074C 52 DB $52 074D 41 DB $41 074E 4D DB $4D 074F 32 DB $32 0750 20 DB $20 0751 4D DB $4D 0752 3D DB $3D 0753 52 DB $52 0754 41 DB $41 0755 4D DB $4D 0756 33 DB $33 0757 00 DB $00 0758 07 DB $07 0759 07 DB $07 075A 07 DB $07 075B 0F DB $0F 075C 0F DB $0F 075D 17 DB $17 075E 17 DB $17 075F 1F DB $1F 0760 1F DB $1F 0761 27 DB $27 0762 27 DB $27 0763 2F DB $2F 0764 2F DB $2F 0765 37 DB $37 0766 37 DB $37 0767 3F DB $3F 0768 3F DB $3F 0769 37 DB $37 076A 37 DB $37 076B 2F DB $2F 076C 2F DB $2F 076D 27 DB $27 076E 27 DB $27 076F 1F DB $1F 0770 1F DB $1F 0771 17 DB $17 0772 17 DB $17 0773 0F DB $0F 0774 0F DB $0F 0775 07 DB $07 0776 07 DB $07 0777 07 DB $07 0778 3F DB $3F 0779 FC DB $FC 077A 3F DB $3F 077B FC DB $FC 077C 7F DB $7F 077D FC DB $FC 077E 7F DB $7F 077F FC DB $FC 0780 3F DB $3F 0781 FC DB $FC 0782 70 DB $70 0783 0E DB $0E 0784 70 DB $70 0785 0E DB $0E 0786 70 DB $70 0787 0E DB $0E 0788 70 DB $70 0789 0E DB $0E 078A 70 DB $70 078B 0E DB $0E 078C 70 DB $70 078D 00 DB $00 078E 70 DB $70 078F 0E DB $0E 0790 7F DB $7F 0791 FC DB $FC 0792 70 DB $70 0793 0E DB $0E 0794 70 DB $70 0795 0E DB $0E 0796 70 DB $70 0797 00 DB $00 0798 70 DB $70 0799 0E DB $0E 079A 70 DB $70 079B 0E DB $0E 079C 7F DB $7F 079D FC DB $FC 079E 7F DB $7F 079F FE DB $FE 07A0 70 DB $70 07A1 0E DB $0E 07A2 70 DB $70 07A3 0E DB $0E 07A4 70 DB $70 07A5 0E DB $0E 07A6 70 DB $70 07A7 1C DB $1C 07A8 70 DB $70 07A9 0E DB $0E 07AA 3F DB $3F 07AB FC DB $FC 07AC 3F DB $3F 07AD FC DB $FC 07AE 7F DB $7F 07AF FC DB $FC 07B0 70 DB $70 07B1 0E DB $0E 07B2 70 DB $70 07B3 0E DB $0E 07B4 00 DB $00 07B5 00 DB $00 07B6 00 DB $00 07B7 00 DB $00 07B8 00 DB $00 07B9 00 DB $00 07BA 00 DB $00 07BB 00 DB $00 07BC 00 DB $00 07BD 00 DB $00 07BE FF DB $FF 07BF FF DB $FF 07C0 FF DB $FF 07C1 FF DB $FF 07C2 FF DB $FF 07C3 FF DB $FF 07C4 FF DB $FF 07C5 FF DB $FF 07C6 FF DB $FF 07C7 FF DB $FF 07C8 FF DB $FF 07C9 FF DB $FF 07CA FF DB $FF 07CB FF DB $FF 07CC FF DB $FF 07CD FF DB $FF 07CE FF DB $FF 07CF FF DB $FF 07D0 FF DB $FF 07D1 FF DB $FF 07D2 FF DB $FF 07D3 FF DB $FF 07D4 FF DB $FF 07D5 FF DB $FF 07D6 FF DB $FF 07D7 FF DB $FF 07D8 FF DB $FF 07D9 FF DB $FF 07DA FF DB $FF 07DB FF DB $FF 07DC FF DB $FF 07DD FF DB $FF 07DE FF DB $FF 07DF FF DB $FF 07E0 FF DB $FF 07E1 FF DB $FF 07E2 FF DB $FF 07E3 FF DB $FF 07E4 FF DB $FF 07E5 FF DB $FF 07E6 FF DB $FF 07E7 FF DB $FF 07E8 FF DB $FF 07E9 FF DB $FF 07EA FF DB $FF 07EB FF DB $FF 07EC FF DB $FF 07ED FF DB $FF 07EE FF DB $FF 07EF FF DB $FF 07F0 FF DB $FF 07F1 FF DB $FF 07F2 FF DB $FF 07F3 FF DB $FF 07F4 FF DB $FF 07F5 FF DB $FF 07F6 FF DB $FF 07F7 FF DB $FF 07F8 FF DB $FF 07F9 FF DB $FF 07FA FF DB $FF 07FB FF DB $FF 07FC FF DB $FF 07FD FF DB $FF 07FE FF DB $FF 07FF FF DB $FF